home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Leser 15 / Amiga Plus Leser CD 15.iso / Tools / Freeware / AmiPCB / ARexx / _Syntax.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  2002-03-13  |  506 b   |  9 lines
  1. /* Error handling for AmiPCB *** SIGNAL ON SYNTAX */
  2. parse arg lg,script,linenbr,erreur
  3. select
  4.     when lg=1 then 'MESSAGE("Script: 'script'"+CHR(10)+"Erreur de syntaxe"+CHR(10)+"en ligne 'linenbr'"+CHR(10)+"'errortext(erreur)'")'
  5.     when lg=2 then 'MESSAGE("Skript: 'script'"+CHR(10)+"Syntax-Fehler"+CHR(10)+"in Zeile 'linenbr'"+CHR(10)+"'errortext(erreur)'")'
  6.     otherwise      'MESSAGE("Script: 'script'"+CHR(10)+"Syntax error"+CHR(10)+"in line 'linenbr'"+CHR(10)+"'errortext(erreur)'")'
  7. end
  8. return 0
  9.